408 lines
9.0 KiB
C
408 lines
9.0 KiB
C
|
/* Copyright Joyent, Inc. and other Node contributors. All rights reserved.
|
||
|
|
*
|
||
|
|
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
||
|
|
* of this software and associated documentation files (the "Software"), to
|
||
|
|
* deal in the Software without restriction, including without limitation the
|
||
|
|
* rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
||
|
|
* sell copies of the Software, and to permit persons to whom the Software is
|
||
|
|
* furnished to do so, subject to the following conditions:
|
||
|
|
*
|
||
|
|
* The above copyright notice and this permission notice shall be included in
|
||
|
|
* all copies or substantial portions of the Software.
|
||
|
|
*
|
||
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||
|
|
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||
|
|
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||
|
|
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
|
||
|
|
* IN THE SOFTWARE.
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "uv.h"
|
||
|
|
#include "task.h"
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
|
||
|
|
typedef struct {
|
||
|
|
uv_write_t req;
|
||
|
|
uv_buf_t buf;
|
||
|
|
} write_req_t;
|
||
|
|
|
||
|
|
static uv_loop_t* loop;
|
||
|
|
|
||
|
|
static int server_closed;
|
||
|
|
static stream_type serverType;
|
||
|
|
static uv_tcp_t tcpServer;
|
||
|
|
static uv_udp_t udpServer;
|
||
|
|
static uv_pipe_t pipeServer;
|
||
|
|
static uv_handle_t* server;
|
||
|
|
static uv_udp_send_t* send_freelist;
|
||
|
|
|
||
|
|
static void after_write(uv_write_t* req, int status);
|
||
|
|
static void after_read(uv_stream_t*, ssize_t nread, const uv_buf_t* buf);
|
||
|
|
static void on_close(uv_handle_t* peer);
|
||
|
|
static void on_server_close(uv_handle_t* handle);
|
||
|
|
static void on_connection(uv_stream_t*, int status);
|
||
|
|
|
||
|
|
|
||
|
|
static void after_write(uv_write_t* req, int status) {
|
||
|
|
write_req_t* wr;
|
||
|
|
|
||
|
|
/* Free the read/write buffer and the request */
|
||
|
|
wr = (write_req_t*) req;
|
||
|
|
free(wr->buf.base);
|
||
|
|
free(wr);
|
||
|
|
|
||
|
|
if (status == 0)
|
||
|
|
return;
|
||
|
|
|
||
|
|
fprintf(stderr,
|
||
|
|
"uv_write error: %s - %s\n",
|
||
|
|
uv_err_name(status),
|
||
|
|
uv_strerror(status));
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static void after_shutdown(uv_shutdown_t* req, int status) {
|
||
|
|
uv_close((uv_handle_t*) req->handle, on_close);
|
||
|
|
free(req);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static void after_read(uv_stream_t* handle,
|
||
|
|
ssize_t nread,
|
||
|
|
const uv_buf_t* buf) {
|
||
|
|
int i;
|
||
|
|
write_req_t *wr;
|
||
|
|
uv_shutdown_t* sreq;
|
||
|
|
|
||
|
|
if (nread < 0) {
|
||
|
|
/* Error or EOF */
|
||
|
|
ASSERT(nread == UV_EOF);
|
||
|
|
|
||
|
|
free(buf->base);
|
||
|
|
sreq = malloc(sizeof* sreq);
|
||
|
|
ASSERT(0 == uv_shutdown(sreq, handle, after_shutdown));
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (nread == 0) {
|
||
|
|
/* Everything OK, but nothing read. */
|
||
|
|
free(buf->base);
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Scan for the letter Q which signals that we should quit the server.
|
||
|
|
* If we get QS it means close the stream.
|
||
|
|
*/
|
||
|
|
if (!server_closed) {
|
||
|
|
for (i = 0; i < nread; i++) {
|
||
|
|
if (buf->base[i] == 'Q') {
|
||
|
|
if (i + 1 < nread && buf->base[i + 1] == 'S') {
|
||
|
|
free(buf->base);
|
||
|
|
uv_close((uv_handle_t*)handle, on_close);
|
||
|
|
return;
|
||
|
|
} else {
|
||
|
|
uv_close(server, on_server_close);
|
||
|
|
server_closed = 1;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
wr = (write_req_t*) malloc(sizeof *wr);
|
||
|
|
ASSERT(wr != NULL);
|
||
|
|
wr->buf = uv_buf_init(buf->base, nread);
|
||
|
|
|
||
|
|
if (uv_write(&wr->req, handle, &wr->buf, 1, after_write)) {
|
||
|
|
FATAL("uv_write failed");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static void on_close(uv_handle_t* peer) {
|
||
|
|
free(peer);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static void echo_alloc(uv_handle_t* handle,
|
||
|
|
size_t suggested_size,
|
||
|
|
uv_buf_t* buf) {
|
||
|
|
buf->base = malloc(suggested_size);
|
||
|
|
buf->len = suggested_size;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void slab_alloc(uv_handle_t* handle,
|
||
|
|
size_t suggested_size,
|
||
|
|
uv_buf_t* buf) {
|
||
|
|
/* up to 16 datagrams at once */
|
||
|
|
static char slab[16 * 64 * 1024];
|
||
|
|
buf->base = slab;
|
||
|
|
buf->len = sizeof(slab);
|
||
|
|
}
|
||
|
|
|
||
|
|
static void on_connection(uv_stream_t* server, int status) {
|
||
|
|
uv_stream_t* stream;
|
||
|
|
int r;
|
||
|
|
|
||
|
|
if (status != 0) {
|
||
|
|
fprintf(stderr, "Connect error %s\n", uv_err_name(status));
|
||
|
|
}
|
||
|
|
ASSERT(status == 0);
|
||
|
|
|
||
|
|
switch (serverType) {
|
||
|
|
case TCP:
|
||
|
|
stream = malloc(sizeof(uv_tcp_t));
|
||
|
|
ASSERT(stream != NULL);
|
||
|
|
r = uv_tcp_init(loop, (uv_tcp_t*)stream);
|
||
|
|
ASSERT(r == 0);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case PIPE:
|
||
|
|
stream = malloc(sizeof(uv_pipe_t));
|
||
|
|
ASSERT(stream != NULL);
|
||
|
|
r = uv_pipe_init(loop, (uv_pipe_t*)stream, 0);
|
||
|
|
ASSERT(r == 0);
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
ASSERT(0 && "Bad serverType");
|
||
|
|
abort();
|
||
|
|
}
|
||
|
|
|
||
|
|
/* associate server with stream */
|
||
|
|
stream->data = server;
|
||
|
|
|
||
|
|
r = uv_accept(server, stream);
|
||
|
|
ASSERT(r == 0);
|
||
|
|
|
||
|
|
r = uv_read_start(stream, echo_alloc, after_read);
|
||
|
|
ASSERT(r == 0);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static void on_server_close(uv_handle_t* handle) {
|
||
|
|
ASSERT(handle == server);
|
||
|
|
}
|
||
|
|
|
||
|
|
static uv_udp_send_t* send_alloc(void) {
|
||
|
|
uv_udp_send_t* req = send_freelist;
|
||
|
|
if (req != NULL)
|
||
|
|
send_freelist = req->data;
|
||
|
|
else
|
||
|
|
req = malloc(sizeof(*req));
|
||
|
|
return req;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void on_send(uv_udp_send_t* req, int status) {
|
||
|
|
ASSERT(req != NULL);
|
||
|
|
ASSERT(status == 0);
|
||
|
|
req->data = send_freelist;
|
||
|
|
send_freelist = req;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void on_recv(uv_udp_t* handle,
|
||
|
|
ssize_t nread,
|
||
|
|
const uv_buf_t* rcvbuf,
|
||
|
|
const struct sockaddr* addr,
|
||
|
|
unsigned flags) {
|
||
|
|
uv_buf_t sndbuf;
|
||
|
|
|
||
|
|
if (nread == 0) {
|
||
|
|
/* Everything OK, but nothing read. */
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
ASSERT(nread > 0);
|
||
|
|
ASSERT(addr->sa_family == AF_INET);
|
||
|
|
|
||
|
|
uv_udp_send_t* req = send_alloc();
|
||
|
|
ASSERT(req != NULL);
|
||
|
|
sndbuf = uv_buf_init(rcvbuf->base, nread);
|
||
|
|
ASSERT(0 <= uv_udp_send(req, handle, &sndbuf, 1, addr, on_send));
|
||
|
|
}
|
||
|
|
|
||
|
|
static int tcp4_echo_start(int port) {
|
||
|
|
struct sockaddr_in addr;
|
||
|
|
int r;
|
||
|
|
|
||
|
|
ASSERT(0 == uv_ip4_addr("0.0.0.0", port, &addr));
|
||
|
|
|
||
|
|
server = (uv_handle_t*)&tcpServer;
|
||
|
|
serverType = TCP;
|
||
|
|
|
||
|
|
r = uv_tcp_init(loop, &tcpServer);
|
||
|
|
if (r) {
|
||
|
|
/* TODO: Error codes */
|
||
|
|
fprintf(stderr, "Socket creation error\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
r = uv_tcp_bind(&tcpServer, (const struct sockaddr*) &addr, 0);
|
||
|
|
if (r) {
|
||
|
|
/* TODO: Error codes */
|
||
|
|
fprintf(stderr, "Bind error\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
r = uv_listen((uv_stream_t*)&tcpServer, SOMAXCONN, on_connection);
|
||
|
|
if (r) {
|
||
|
|
/* TODO: Error codes */
|
||
|
|
fprintf(stderr, "Listen error %s\n", uv_err_name(r));
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int tcp6_echo_start(int port) {
|
||
|
|
struct sockaddr_in6 addr6;
|
||
|
|
int r;
|
||
|
|
|
||
|
|
ASSERT(0 == uv_ip6_addr("::1", port, &addr6));
|
||
|
|
|
||
|
|
server = (uv_handle_t*)&tcpServer;
|
||
|
|
serverType = TCP;
|
||
|
|
|
||
|
|
r = uv_tcp_init(loop, &tcpServer);
|
||
|
|
if (r) {
|
||
|
|
/* TODO: Error codes */
|
||
|
|
fprintf(stderr, "Socket creation error\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* IPv6 is optional as not all platforms support it */
|
||
|
|
r = uv_tcp_bind(&tcpServer, (const struct sockaddr*) &addr6, 0);
|
||
|
|
if (r) {
|
||
|
|
/* show message but return OK */
|
||
|
|
fprintf(stderr, "IPv6 not supported\n");
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
r = uv_listen((uv_stream_t*)&tcpServer, SOMAXCONN, on_connection);
|
||
|
|
if (r) {
|
||
|
|
/* TODO: Error codes */
|
||
|
|
fprintf(stderr, "Listen error\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int udp4_echo_start(int port) {
|
||
|
|
struct sockaddr_in addr;
|
||
|
|
int r;
|
||
|
|
|
||
|
|
ASSERT(0 == uv_ip4_addr("127.0.0.1", port, &addr));
|
||
|
|
server = (uv_handle_t*)&udpServer;
|
||
|
|
serverType = UDP;
|
||
|
|
|
||
|
|
r = uv_udp_init(loop, &udpServer);
|
||
|
|
if (r) {
|
||
|
|
fprintf(stderr, "uv_udp_init: %s\n", uv_strerror(r));
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
r = uv_udp_bind(&udpServer, (const struct sockaddr*) &addr, 0);
|
||
|
|
if (r) {
|
||
|
|
fprintf(stderr, "uv_udp_bind: %s\n", uv_strerror(r));
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
r = uv_udp_recv_start(&udpServer, slab_alloc, on_recv);
|
||
|
|
if (r) {
|
||
|
|
fprintf(stderr, "uv_udp_recv_start: %s\n", uv_strerror(r));
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int pipe_echo_start(char* pipeName) {
|
||
|
|
int r;
|
||
|
|
|
||
|
|
#ifndef _WIN32
|
||
|
|
{
|
||
|
|
uv_fs_t req;
|
||
|
|
uv_fs_unlink(NULL, &req, pipeName, NULL);
|
||
|
|
uv_fs_req_cleanup(&req);
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
|
||
|
|
server = (uv_handle_t*)&pipeServer;
|
||
|
|
serverType = PIPE;
|
||
|
|
|
||
|
|
r = uv_pipe_init(loop, &pipeServer, 0);
|
||
|
|
if (r) {
|
||
|
|
fprintf(stderr, "uv_pipe_init: %s\n", uv_strerror(r));
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
r = uv_pipe_bind(&pipeServer, pipeName);
|
||
|
|
if (r) {
|
||
|
|
fprintf(stderr, "uv_pipe_bind: %s\n", uv_strerror(r));
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
r = uv_listen((uv_stream_t*)&pipeServer, SOMAXCONN, on_connection);
|
||
|
|
if (r) {
|
||
|
|
fprintf(stderr, "uv_pipe_listen: %s\n", uv_strerror(r));
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
HELPER_IMPL(tcp4_echo_server) {
|
||
|
|
loop = uv_default_loop();
|
||
|
|
|
||
|
|
if (tcp4_echo_start(TEST_PORT))
|
||
|
|
return 1;
|
||
|
|
|
||
|
|
notify_parent_process();
|
||
|
|
uv_run(loop, UV_RUN_DEFAULT);
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
HELPER_IMPL(tcp6_echo_server) {
|
||
|
|
loop = uv_default_loop();
|
||
|
|
|
||
|
|
if (tcp6_echo_start(TEST_PORT))
|
||
|
|
return 1;
|
||
|
|
|
||
|
|
notify_parent_process();
|
||
|
|
uv_run(loop, UV_RUN_DEFAULT);
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
HELPER_IMPL(pipe_echo_server) {
|
||
|
|
loop = uv_default_loop();
|
||
|
|
|
||
|
|
if (pipe_echo_start(TEST_PIPENAME))
|
||
|
|
return 1;
|
||
|
|
|
||
|
|
notify_parent_process();
|
||
|
|
uv_run(loop, UV_RUN_DEFAULT);
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
HELPER_IMPL(udp4_echo_server) {
|
||
|
|
loop = uv_default_loop();
|
||
|
|
|
||
|
|
if (udp4_echo_start(TEST_PORT))
|
||
|
|
return 1;
|
||
|
|
|
||
|
|
notify_parent_process();
|
||
|
|
uv_run(loop, UV_RUN_DEFAULT);
|
||
|
|
return 0;
|
||
|
|
}
|