/* 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 #include /* See test-ipc.c */ void spawn_helper(uv_pipe_t* channel, uv_process_t* process, const char* helper); void ipc_send_recv_helper_threadproc(void* arg); union handles { uv_handle_t handle; uv_stream_t stream; uv_pipe_t pipe; uv_tcp_t tcp; uv_tty_t tty; }; struct test_ctx { uv_pipe_t channel; uv_connect_t connect_req; uv_write_t write_req; uv_write_t write_req2; uv_handle_type expected_type; union handles send; union handles send2; union handles recv; union handles recv2; }; struct echo_ctx { uv_pipe_t listen; uv_pipe_t channel; uv_write_t write_req; uv_write_t write_req2; uv_handle_type expected_type; union handles recv; union handles recv2; }; static struct test_ctx ctx; static struct echo_ctx ctx2; /* Used in write2_cb to decide if we need to cleanup or not */ static int is_child_process; static int is_in_process; static int read_cb_count; static int recv_cb_count; static int write2_cb_called; static void alloc_cb(uv_handle_t* handle, size_t suggested_size, uv_buf_t* buf) { /* we're not actually reading anything so a small buffer is okay */ static char slab[8]; buf->base = slab; buf->len = sizeof(slab); } static void recv_cb(uv_stream_t* handle, ssize_t nread, const uv_buf_t* buf) { uv_handle_type pending; uv_pipe_t* pipe; int r; union handles* recv; pipe = (uv_pipe_t*) handle; ASSERT(pipe == &ctx.channel); do { if (++recv_cb_count == 1) { recv = &ctx.recv; } else { recv = &ctx.recv2; } /* Depending on the OS, the final recv_cb can be called after * the child process has terminated which can result in nread * being UV_EOF instead of the number of bytes read. Since * the other end of the pipe has closed this UV_EOF is an * acceptable value. */ if (nread == UV_EOF) { /* UV_EOF is only acceptable for the final recv_cb call */ ASSERT(recv_cb_count == 2); } else { ASSERT(nread >= 0); ASSERT(uv_pipe_pending_count(pipe) > 0); pending = uv_pipe_pending_type(pipe); ASSERT(pending == ctx.expected_type); if (pending == UV_NAMED_PIPE) r = uv_pipe_init(ctx.channel.loop, &recv->pipe, 0); else if (pending == UV_TCP) r = uv_tcp_init(ctx.channel.loop, &recv->tcp); else abort(); ASSERT(r == 0); r = uv_accept(handle, &recv->stream); ASSERT(r == 0); } } while (uv_pipe_pending_count(pipe) > 0); /* Close after two writes received */ if (recv_cb_count == 2) { uv_close((uv_handle_t*)&ctx.channel, NULL); } } static void connect_cb(uv_connect_t* req, int status) { int r; uv_buf_t buf; ASSERT(req == &ctx.connect_req); ASSERT(status == 0); buf = uv_buf_init(".", 1); r = uv_write2(&ctx.write_req, (uv_stream_t*)&ctx.channel, &buf, 1, &ctx.send.stream, NULL); ASSERT(r == 0); /* Perform two writes to the same pipe to make sure that on Windows we are * not running into issue 505: * https://github.com/libuv/libuv/issues/505 */ buf = uv_buf_init(".", 1); r = uv_write2(&ctx.write_req2, (uv_stream_t*)&ctx.channel, &buf, 1, &ctx.send2.stream, NULL); ASSERT(r == 0); r = uv_read_start((uv_stream_t*)&ctx.channel, alloc_cb, recv_cb); ASSERT(r == 0); } static int run_test(int inprocess) { uv_process_t process; uv_thread_t tid; int r; if (inprocess) { r = uv_thread_create(&tid, ipc_send_recv_helper_threadproc, (void *) 42); ASSERT(r == 0); uv_sleep(1000); r = uv_pipe_init(uv_default_loop(), &ctx.channel, 1); ASSERT(r == 0); uv_pipe_connect(&ctx.connect_req, &ctx.channel, TEST_PIPENAME_3, connect_cb); } else { spawn_helper(&ctx.channel, &process, "ipc_send_recv_helper"); connect_cb(&ctx.connect_req, 0); } r = uv_run(uv_default_loop(), UV_RUN_DEFAULT); ASSERT(r == 0); ASSERT(recv_cb_count == 2); if (inprocess) { r = uv_thread_join(&tid); ASSERT(r == 0); } return 0; } static int run_ipc_send_recv_pipe(int inprocess) { int r; ctx.expected_type = UV_NAMED_PIPE; r = uv_pipe_init(uv_default_loop(), &ctx.send.pipe, 1); ASSERT(r == 0); r = uv_pipe_bind(&ctx.send.pipe, TEST_PIPENAME); ASSERT(r == 0); r = uv_pipe_init(uv_default_loop(), &ctx.send2.pipe, 1); ASSERT(r == 0); r = uv_pipe_bind(&ctx.send2.pipe, TEST_PIPENAME_2); ASSERT(r == 0); r = run_test(inprocess); ASSERT(r == 0); MAKE_VALGRIND_HAPPY(); return 0; } TEST_IMPL(ipc_send_recv_pipe) { #if defined(NO_SEND_HANDLE_ON_PIPE) RETURN_SKIP(NO_SEND_HANDLE_ON_PIPE); #endif return run_ipc_send_recv_pipe(0); } TEST_IMPL(ipc_send_recv_pipe_inprocess) { #if defined(NO_SEND_HANDLE_ON_PIPE) RETURN_SKIP(NO_SEND_HANDLE_ON_PIPE); #endif return run_ipc_send_recv_pipe(1); } static int run_ipc_send_recv_tcp(int inprocess) { struct sockaddr_in addr; int r; ASSERT(0 == uv_ip4_addr("127.0.0.1", TEST_PORT, &addr)); ctx.expected_type = UV_TCP; r = uv_tcp_init(uv_default_loop(), &ctx.send.tcp); ASSERT(r == 0); r = uv_tcp_init(uv_default_loop(), &ctx.send2.tcp); ASSERT(r == 0); r = uv_tcp_bind(&ctx.send.tcp, (const struct sockaddr*) &addr, 0); ASSERT(r == 0); r = uv_tcp_bind(&ctx.send2.tcp, (const struct sockaddr*) &addr, 0); ASSERT(r == 0); r = run_test(inprocess); ASSERT(r == 0); MAKE_VALGRIND_HAPPY(); return 0; } TEST_IMPL(ipc_send_recv_tcp) { #if defined(NO_SEND_HANDLE_ON_PIPE) RETURN_SKIP(NO_SEND_HANDLE_ON_PIPE); #endif return run_ipc_send_recv_tcp(0); } TEST_IMPL(ipc_send_recv_tcp_inprocess) { #if defined(NO_SEND_HANDLE_ON_PIPE) RETURN_SKIP(NO_SEND_HANDLE_ON_PIPE); #endif return run_ipc_send_recv_tcp(1); } /* Everything here runs in a child process or second thread. */ static void write2_cb(uv_write_t* req, int status) { ASSERT(status == 0); /* After two successful writes in the child process, allow the child * process to be closed. */ if (++write2_cb_called == 2 && (is_child_process || is_in_process)) { uv_close(&ctx2.recv.handle, NULL); uv_close(&ctx2.recv2.handle, NULL); uv_close((uv_handle_t*)&ctx2.channel, NULL); uv_close((uv_handle_t*)&ctx2.listen, NULL); } } static void read_cb(uv_stream_t* handle, ssize_t nread, const uv_buf_t* rdbuf) { uv_buf_t wrbuf; uv_pipe_t* pipe; uv_handle_type pending; int r; union handles* recv; uv_write_t* write_req; if (nread == UV_EOF || nread == UV_ECONNABORTED) { return; } pipe = (uv_pipe_t*) handle; do { if (++read_cb_count == 2) { recv = &ctx2.recv; write_req = &ctx2.write_req; } else { recv = &ctx2.recv2; write_req = &ctx2.write_req2; } ASSERT(pipe == &ctx2.channel); ASSERT(nread >= 0); ASSERT(uv_pipe_pending_count(pipe) > 0); pending = uv_pipe_pending_type(pipe); ASSERT(pending == UV_NAMED_PIPE || pending == UV_TCP); if (pending == UV_NAMED_PIPE) r = uv_pipe_init(ctx2.channel.loop, &recv->pipe, 0); else if (pending == UV_TCP) r = uv_tcp_init(ctx2.channel.loop, &recv->tcp); else abort(); ASSERT(r == 0); r = uv_accept(handle, &recv->stream); ASSERT(r == 0); wrbuf = uv_buf_init(".", 1); r = uv_write2(write_req, (uv_stream_t*)&ctx2.channel, &wrbuf, 1, &recv->stream, write2_cb); ASSERT(r == 0); } while (uv_pipe_pending_count(pipe) > 0); } static void send_recv_start(void) { int r; ASSERT(1 == uv_is_readable((uv_stream_t*)&ctx2.channel)); ASSERT(1 == uv_is_writable((uv_stream_t*)&ctx2.channel)); ASSERT(0 == uv_is_closing((uv_handle_t*)&ctx2.channel)); r = uv_read_start((uv_stream_t*)&ctx2.channel, alloc_cb, read_cb); ASSERT(r == 0); } static void listen_cb(uv_stream_t* handle, int status) { int r; ASSERT(handle == (uv_stream_t*)&ctx2.listen); ASSERT(status == 0); r = uv_accept((uv_stream_t*)&ctx2.listen, (uv_stream_t*)&ctx2.channel); ASSERT(r == 0); send_recv_start(); } int run_ipc_send_recv_helper(uv_loop_t* loop, int inprocess) { int r; is_in_process = inprocess; memset(&ctx2, 0, sizeof(ctx2)); r = uv_pipe_init(loop, &ctx2.listen, 0); ASSERT(r == 0); r = uv_pipe_init(loop, &ctx2.channel, 1); ASSERT(r == 0); if (inprocess) { r = uv_pipe_bind(&ctx2.listen, TEST_PIPENAME_3); ASSERT(r == 0); r = uv_listen((uv_stream_t*)&ctx2.listen, SOMAXCONN, listen_cb); ASSERT(r == 0); } else { r = uv_pipe_open(&ctx2.channel, 0); ASSERT(r == 0); send_recv_start(); } notify_parent_process(); r = uv_run(loop, UV_RUN_DEFAULT); ASSERT(r == 0); return 0; } /* stdin is a duplex channel over which a handle is sent. * We receive it and send it back where it came from. */ int ipc_send_recv_helper(void) { int r; r = run_ipc_send_recv_helper(uv_default_loop(), 0); ASSERT(r == 0); MAKE_VALGRIND_HAPPY(); return 0; } void ipc_send_recv_helper_threadproc(void* arg) { int r; uv_loop_t loop; r = uv_loop_init(&loop); ASSERT(r == 0); r = run_ipc_send_recv_helper(&loop, 1); ASSERT(r == 0); r = uv_loop_close(&loop); ASSERT(r == 0); }